home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
lisp
/
eulisp
/
mpfeel.lha
/
MPFeel
/
bvf.h
< prev
next >
Wrap
Text File
|
1992-10-06
|
523b
|
22 lines
/*
* Definition of Bytevector functions
*
*/
/* External interface */
LispObject apply_nary_bytefunction(LispObject */*stacktop*/, int args, LispObject fn);
/* Internal reperesentation */
#define N_SLOTS_IN_BYTEFUNCTION 4
/* represented as: module #, offset */
/* better would be codevector, offset, static vector ? */
#define bytefunction_env(bvf) slotref(bvf,0)
#define bytefunction_offset(bvf) slotref(bvf,1)
#define bytefunction_codenum(bvf) slotref(bvf,2)
#define bytefunction_nargs(bvf) slotref(bvf,3)